info <- dicom_info("11_DICOM") info %>% dplyr::select(-file_name)
labels4 = c( "Base image", "Segmented fat", "Subcutaneous fat", "Visceral fat" )